home *** CD-ROM | disk | FTP | other *** search
/ Maximum CD 2000 November / Maximum CD 2000 Nov.iso / AofE-Conquerers / age2xtrial.exe / CABFILE / MSGAME.CAB / Data / gamedata_x1.drs / Unnamed File 000017.bina < prev    next >
Text File  |  2000-07-18  |  3KB  |  134 lines
  1. (defrule
  2.     (difficulty >= easy)
  3.     (game-time > 600)
  4.     (soldier-count < five-percent-pop)
  5.     (unit-type-count-total villager <= 4)
  6.     (nor 
  7.         (hold-relics)
  8.         (hold-koh-ruin)
  9.     )
  10. =>
  11.     (set-goal 1 19)
  12.     (disable-self)
  13. )
  14.  
  15. (defrule
  16.     (difficulty == moderate)
  17.     (game-time > 600)
  18.     (building-type-count wonder < 1)
  19.     (soldier-count < five-percent-pop)
  20.     (unit-type-count-total villager <= 2)
  21.     (nor 
  22.         (hold-relics)
  23.         (hold-koh-ruin)
  24.     )
  25. =>
  26.     (set-goal 1 19)
  27.     (disable-self)
  28. )
  29.  
  30. (defrule
  31.     (difficulty <= hard)
  32.     (game-time > 600)
  33.     (building-type-count wonder < 1)
  34.     (soldier-count <= 3)
  35.     (unit-type-count cannon-galleon-line == 0)
  36.     (unit-type-count-total villager == 0)
  37.     (nor 
  38.         (hold-relics)
  39.         (hold-koh-ruin)
  40.     )
  41. =>
  42.     (set-goal 1 19)
  43.     (disable-self)
  44. )
  45.  
  46. (defrule
  47.     (goal 1 19)
  48.     (stance-toward any-human ally)
  49.     (difficulty <= moderate)
  50. =>
  51.     (release-escrow wood)
  52.     (release-escrow food)
  53.     (release-escrow gold)
  54.     (release-escrow stone)
  55.     (tribute-to-player this-any-human wood 10000)
  56.     (tribute-to-player this-any-human food 10000)
  57.     (tribute-to-player this-any-human gold 10000)
  58.     (tribute-to-player this-any-human stone 10000)
  59.     (disable-self)
  60. )
  61.  
  62. (defrule
  63.     (goal 1 19)
  64.     (players-population any-ally > 10)
  65.     (difficulty <= moderate)
  66. =>
  67.     (release-escrow wood)
  68.     (release-escrow food)
  69.     (release-escrow gold)
  70.     (release-escrow stone)
  71.     (tribute-to-player this-any-ally wood 10000)
  72.     (tribute-to-player this-any-ally food 10000)
  73.     (tribute-to-player this-any-ally gold 10000)
  74.     (tribute-to-player this-any-ally stone 10000)
  75.     (disable-self)
  76. )
  77.  
  78. ;*****************************
  79. ;delete all buildings
  80. (defrule
  81.     (goal 1 19)
  82. =>
  83.     (delete-unit villager)
  84. )
  85.  
  86. (defrule
  87.     (goal 1 19)
  88. =>
  89.     (delete-building dock)
  90.     (delete-building town-center)
  91.     (delete-building monastery)
  92.  
  93.     (delete-building barracks)
  94.     (delete-building archery-range)
  95.     (delete-building stable)
  96.  
  97.     (delete-building siege-workshop)
  98. )
  99.  
  100. (defrule
  101.     (goal 1 19)
  102.     (not (stance-toward any-human ally) )
  103. =>
  104.     (delete-building watch-tower)
  105.     (delete-building guard-tower)
  106.     (delete-building keep)
  107.  
  108.     (delete-building bombard-tower)
  109.     (delete-building castle)
  110. )
  111.  
  112. (defrule
  113.     (goal 1 19)
  114.     (building-type-count barracks == 0)
  115.     (building-type-count archery-range == 0)
  116.     (building-type-count stable == 0)
  117.     (building-type-count siege-workshop == 0)
  118. =>
  119.     (set-goal 1 9)
  120.     (disable-self)
  121. )
  122.  
  123. ;*****************************
  124. ;** All random taunts moved to aiexpert.txt 
  125. (defrule
  126.     (goal 1 9)
  127. =>
  128.     (chat-to-all-using-range 22300  22)
  129.     (chat-to-all-using-id 22322)
  130.         ;"No wonder thou wert victorious! I shalt abdicate."
  131.     (resign)
  132.     (disable-self)
  133. )
  134.